home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 65 / 64er_Magazin_Sonderheft_65_19xx_Markt__Technik_de_Side_A.d64 / adressen 204_207 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  550 b   |  17 lines
  1. 10 printchr$(147)chr$(14)
  2. 20 print"[205]it den [193]dressen 204 und 207 kann man"
  3. 30 print"einen blinkenden [195]ursor (wie bei der"
  4. 40 print"[201][206][208][213][212]-[193]bfrage) simulieren. [196]ie [197]ingaben"
  5. 50 print"muessen dann mit [199][197][212] gelesen werden.":print
  6. 52 print"[196]azu muss man in [193]dresse 204 >0< [208][207][203][197]n."
  7. 53 print"[213]m den [195]ursor wieder vom [194]ildschirm zu"
  8. 54 print"entfernen, sollte nach der [197]ingabe in"
  9. 55 print"[193]dresse 204 der [215]ert >1<, in 207 die"
  10. 56 print"[218]ahl >0< geschrieben werden:"
  11. 57 print:print"[194]eispiel:"
  12. 60 print:print:print"[197]ingabe:";
  13. 70 poke204,0:poke198,0:wait198,1:gett$:gosub100
  14. 72 ift$=chr$(13)thengosub100:end
  15. 90 goto 70
  16. 100 poke207,0:poke204,1:printt$;:return
  17.